home *** CD-ROM | disk | FTP | other *** search
/ Selling To the Government / Selling to the Government.iso / aladdin / datapac.scr < prev    next >
Text File  |  1993-08-28  |  773b  |  42 lines
  1.  SCRIPT # DATAPAC Logon
  2.  ECHO OFF
  3.  HHH OFF
  4.  
  5.  ;Configuration
  6.  
  7.  SETSTRING 1 "###-####"      | Local DATAPAC number
  8.  SETSTRING 2 "ATZ"           | Modem reset
  9.  SETSTRING 3 "ATDT"          | Dial command
  10.  SETSTRING 4 "########"      | 8-digit region code
  11.  
  12.  ;
  13.  ;USE "95700517" IF CALLING FROM EASTERN CANADA
  14.  ;(AREA CODES: 416,418,506,514,519,613,705,709,807,819,902)
  15.  ;
  16.  ;USE "84400312" IF CALLING FROM WESTERN CANADA
  17.  ;(AREA CODES: 204,306,403,604)
  18.  
  19.  
  20.  SENDLINE "%2"
  21.  WAITFOR "OK"
  22.  :DIAL
  23.  PAUSE 1
  24.  SENDLINE "%3%1"
  25.  PAUSE 1
  26.  WAITFOR "^M"
  27.  WAITFOR "^M"
  28.  IF CURRENTLINEHAS "NO"
  29.    GOTO DIAL
  30.  ENDIF
  31.  IF CURRENTLINEHAS "BUSY"
  32.    GOTO DIAL
  33.  ENDIF
  34.  PAUSE 2
  35.  SEND ".."
  36.  PAUSE 1
  37.  SEND "^M"
  38.  WAITFOR "DATAPAC:"
  39.  PAUSE 3
  40.  SENDLINE "%4"
  41.  ENDSCRIPT
  42.